www.gusucode.com > NGSIM 数据库换道规则提取源码程序 > NGSIM 数据库换道规则提取源码程序/shujuchulichengxu/change.m

    function change(Vehicle,col,num)
%UNTITLED 此处显示有关此函数的摘要
%   此处显示详细说明
    %SaveData=[];
    VehicleLane=Vehicle(:,col);
    for i=1:length(VehicleLane)-1
    if (VehicleLane(i)~=VehicleLane(i+1))
     %   SaveData=[SaveData;i,Vehicle(i,:)];
         xlswrite(['Change',num2str(num)],Vehicle);
    end
    end
%     if(~isempty(SaveData))
%    % xlswrite(['Change',num2str(num)],SaveData);
%     end
end